/ Developer CD Series 2000 November: Tool Chest / Dev.CD Nov 00 TC Disk 2.toast / pc / tool chest / macapp / ad lib 3.0.1 / install ad lib 3.0.1 / Ad Lib 3.0.1 / MacApp Extensions / AdLibLink.r

next >

MacOS 8.1

Win98

DOS

browse contents

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 0b 41 64 4c 69 62 4c | 69 6e 6b 2e 72 00 00 00 |..AdLibL|ink.r...|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 43 57 49 | 45 01 00 00 00 00 00 00 |.TEXTCWI|E.......|
|00000050| 00 00 00 00 00 06 27 00 | 00 01 da ac 7d 72 f8 ac |......'.|....}r..|
|00000060| 7d 72 f8 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |}r......|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 9b e3 00 00 |........|........|
|00000080| 2f 2f 09 41 64 4c 69 62 | 4c 69 6e 6b 2e 72 0d 2f |//.AdLib|Link.r./|
|00000090| 2f 09 43 6f 70 79 72 69 | 67 68 74 20 a9 20 31 39 |/.Copyri|ght . 19|
|000000a0| 39 33 2d 31 39 39 34 20 | 4e 69 63 6b 20 4e 61 6c |93-1994 |Nick Nal|
|000000b0| 6c 69 63 6b 2e 20 20 41 | 6c 6c 20 72 69 67 68 74 |lick.  A|ll right|
|000000c0| 73 20 72 65 73 65 72 76 | 65 64 2e 0d 2f 2f 0d 2f |s reserv|ed..//./|
|000000d0| 2f 0d 2f 2f 09 43 68 61 | 6e 67 65 73 3a 0d 2f 2f |/.//.Cha|nges:.//|
|000000e0| 0d 2f 2f 09 09 a5 09 45 | 78 70 6c 69 63 69 74 6c |.//....E|xplicitl|
|000000f0| 79 20 69 6e 63 6c 75 64 | 65 20 4d 61 63 41 70 70 |y includ|e MacApp|
|00000100| 54 79 70 65 73 2e 72 20 | 66 6f 72 20 74 68 65 20 |Types.r |for the |
|00000110| 27 61 65 64 74 27 20 64 | 65 66 69 6e 69 74 69 6f |'aedt' d|efinitio|
|00000120| 6e 2e 0d 2f 2f 0d 0d 23 | 69 66 6e 64 65 66 20 5f |n..//..#|ifndef _|
|00000130| 5f 54 59 50 45 53 2e 52 | 5f 5f 0d 23 69 6e 63 6c |_TYPES.R|__.#incl|
|00000140| 75 64 65 20 22 54 79 70 | 65 73 2e 72 22 0d 23 65 |ude "Typ|es.r".#e|
|00000150| 6e 64 69 66 0d 0d 23 69 | 66 6e 64 65 66 20 5f 5f |ndif..#i|fndef __|
|00000160| 4d 61 63 41 70 70 54 79 | 70 65 73 5f 5f 0d 23 69 |MacAppTy|pes__.#i|
|00000170| 6e 63 6c 75 64 65 20 22 | 4d 61 63 41 70 70 54 79 |nclude "|MacAppTy|
|00000180| 70 65 73 2e 72 22 0d 23 | 65 6e 64 69 66 0d 0d 0d |pes.r".#|endif...|
|00000190| 2f 2f 09 44 65 66 69 6e | 65 20 61 20 74 65 6d 70 |//.Defin|e a temp|
|000001a0| 6c 61 74 65 20 66 6f 72 | 20 74 68 65 20 27 42 48 |late for| the 'BH|
|000001b0| 56 52 27 20 72 65 73 6f | 75 72 63 65 2e 0d 74 79 |VR' reso|urce..ty|
|000001c0| 70 65 20 27 42 48 56 52 | 27 0d 7b 0d 09 69 6e 74 |pe 'BHVR|'.{..int|
|000001d0| 65 67 65 72 20 3d 20 24 | 24 43 6f 75 6e 74 4f 66 |eger = $|$CountOf|
|000001e0| 28 42 65 68 61 76 69 6f | 72 41 72 72 61 79 29 3b |(Behavio|rArray);|
|000001f0| 0d 09 77 69 64 65 20 61 | 72 72 61 79 20 42 65 68 |..wide a|rray Beh|
|00000200| 61 76 69 6f 72 41 72 72 | 61 79 0d 09 7b 0d 53 74 |aviorArr|ay..{.St|
|00000210| 61 72 74 4f 66 42 65 68 | 61 76 69 6f 72 3a 0d 09 |artOfBeh|avior:..|
|00000220| 09 69 6e 74 65 67 65 72 | 20 3d 20 33 3b 09 09 09 |.integer| = 3;...|
|00000230| 09 09 09 09 09 09 09 2f | 2f 20 6b 53 69 67 6e 61 |......./|/ kSigna|
|00000240| 74 75 72 65 41 6e 64 43 | 6c 61 73 73 6e 61 6d 65 |tureAndC|lassname|
|00000250| 0d 09 09 6c 69 74 65 72 | 61 6c 20 6c 6f 6e 67 69 |...liter|al longi|
|00000260| 6e 74 20 3d 20 27 20 20 | 20 20 27 3b 09 09 09 09 |nt = '  |  ';....|
|00000270| 2f 2f 20 73 69 67 6e 61 | 74 75 72 65 0d 09 09 6c |// signa|ture...l|
|00000280| 6f 6e 67 69 6e 74 20 3d | 20 28 28 45 6e 64 4f 66 |ongint =| ((EndOf|
|00000290| 42 65 68 61 76 69 6f 72 | 5b 24 24 41 72 72 61 79 |Behavior|[$$Array|
|000002a0| 49 6e 64 65 78 28 42 65 | 68 61 76 69 6f 72 41 72 |Index(Be|haviorAr|
|000002b0| 72 61 79 29 5d 20 2d 20 | 53 74 61 72 74 4f 66 42 |ray)] - |StartOfB|
|000002c0| 65 68 61 76 69 6f 72 5b | 24 24 41 72 72 61 79 49 |ehavior[|$$ArrayI|
|000002d0| 6e 64 65 78 28 42 65 68 | 61 76 69 6f 72 41 72 72 |ndex(Beh|aviorArr|
|000002e0| 61 79 29 5d 29 20 2f 20 | 38 29 20 2d 20 36 3b 0d |ay)]) / |8) - 6;.|
|000002f0| 09 09 70 73 74 72 69 6e | 67 3b 09 09 09 09 09 09 |..pstrin|g;......|
|00000300| 09 09 09 09 09 09 2f 2f | 20 63 6c 61 73 73 20 6e |......//| class n|
|00000310| 61 6d 65 0d 09 09 6c 69 | 74 65 72 61 6c 20 6c 6f |ame...li|teral lo|
|00000320| 6e 67 69 6e 74 20 6e 6f | 49 44 20 3d 20 27 20 20 |ngint no|ID = '  |
|00000330| 20 20 27 3b 09 2f 2f 20 | 66 49 64 65 6e 74 69 66 |  ';.// |fIdentif|
|00000340| 69 65 72 0d 09 09 62 79 | 74 65 09 6e 6f 74 45 6e |ier...by|te.notEn|
|00000350| 61 62 6c 65 64 2c 20 65 | 6e 61 62 6c 65 64 3b 09 |abled, e|nabled;.|
|00000360| 09 09 2f 2f 20 66 45 6e | 61 62 6c 65 64 0d 20 20 |..// fEn|abled.  |
|00000370| 09 6c 6f 6e 67 69 6e 74 | 20 6e 6f 49 64 6c 65 20 |.longint| noIdle |
|00000380| 3d 20 32 31 34 37 34 38 | 33 36 34 37 3b 09 09 2f |= 214748|3647;../|
|00000390| 2f 20 66 49 64 6c 65 46 | 72 65 71 0d 45 6e 64 4f |/ fIdleF|req.EndO|
|000003a0| 66 42 65 68 61 76 69 6f | 72 3a 0d 09 7d 3b 0d 7d |fBehavio|r:..};.}|
|000003b0| 3b 0d 0d 0d 2f 2f 09 43 | 72 65 61 74 65 20 61 20 |;...//.C|reate a |
|000003c0| 72 65 73 6f 75 72 63 65 | 20 74 6f 20 61 64 64 20 |resource| to add |
|000003d0| 61 20 54 41 64 4c 69 62 | 4c 69 6e 6b 20 62 65 68 |a TAdLib|Link beh|
|000003e0| 61 76 69 6f 72 20 74 6f | 20 74 68 65 20 61 70 70 |avior to| the app|
|000003f0| 6c 69 63 61 74 69 6f 6e | 2e 0d 2f 2f 09 54 68 65 |lication|..//.The|
|00000400| 20 61 70 70 6c 69 63 61 | 74 69 6f 6e 20 6d 75 73 | applica|tion mus|
|00000410| 74 20 62 65 20 64 65 72 | 69 76 65 64 20 66 72 6f |t be der|ived fro|
|00000420| 6d 20 54 42 65 68 61 76 | 69 6f 72 41 70 70 2e 0d |m TBehav|iorApp..|
|00000430| 2f 2f 0d 72 65 73 6f 75 | 72 63 65 20 27 42 48 56 |//.resou|rce 'BHV|
|00000440| 52 27 20 28 39 39 30 29 | 0d 7b 0d 09 7b 0d 09 09 |R' (990)|.{..{...|
|00000450| 22 54 41 64 4c 69 62 4c | 69 6e 6b 22 2c 20 27 61 |"TAdLibL|ink", 'a|
|00000460| 4c 69 62 27 2c 20 65 6e | 61 62 6c 65 64 2c 20 6e |Lib', en|abled, n|
|00000470| 6f 49 64 6c 65 0d 09 7d | 3b 0d 7d 3b 0d 0d 0d 2f |oIdle..}|;.};.../|
|00000480| 2f 09 43 72 65 61 74 65 | 20 61 6e 20 27 61 65 64 |/.Create| an 'aed|
|00000490| 74 27 20 72 65 73 6f 75 | 72 63 65 20 74 6f 20 72 |t' resou|rce to r|
|000004a0| 65 67 69 73 74 65 72 20 | 41 64 20 4c 69 62 27 73 |egister |Ad Lib's|
|000004b0| 20 72 65 73 6f 75 72 63 | 65 20 73 61 76 69 6e 67 | resourc|e saving|
|000004c0| 20 41 70 70 6c 65 45 76 | 65 6e 74 73 2e 0d 2f 2f | AppleEv|ents..//|
|000004d0| 0d 2f 2f 09 4e 6f 74 65 | 20 74 68 61 74 20 77 65 |.//.Note| that we|
|000004e0| 20 61 72 65 20 75 73 69 | 6e 67 20 76 61 6c 75 65 | are usi|ng value|
|000004f0| 73 20 74 68 61 74 20 61 | 72 65 20 74 65 63 68 6e |s that a|re techn|
|00000500| 69 63 61 6c 6c 79 20 72 | 65 73 65 72 76 65 64 20 |ically r|eserved |
|00000510| 66 6f 72 20 4d 61 63 41 | 70 70 20 69 74 73 65 6c |for MacA|pp itsel|
|00000520| 66 2e 20 20 54 68 69 73 | 20 69 73 20 74 6f 0d 2f |f.  This| is to./|
|00000530| 2f 09 65 6e 73 75 72 65 | 20 74 68 61 74 20 74 68 |/.ensure| that th|
|00000540| 65 72 65 20 69 73 20 6e | 6f 74 20 61 20 63 6f 6e |ere is n|ot a con|
|00000550| 66 6c 69 63 74 20 77 69 | 74 68 20 74 68 65 20 61 |flict wi|th the a|
|00000560| 70 70 6c 69 63 61 74 69 | 6f 6e 27 73 20 76 61 6c |pplicati|on's val|
|00000570| 75 65 73 2e 20 20 49 74 | 20 69 73 20 70 6f 73 73 |ues.  It| is poss|
|00000580| 69 62 6c 65 0d 2f 2f 09 | 28 61 6c 74 68 6f 75 67 |ible.//.|(althoug|
|00000590| 68 20 75 6e 6c 69 6b 65 | 6c 79 29 20 74 68 61 74 |h unlike|ly) that|
|000005a0| 20 41 70 70 6c 65 20 77 | 69 6c 6c 20 6d 6f 64 69 | Apple w|ill modi|
|000005b0| 66 79 20 4d 61 63 41 70 | 70 20 74 6f 20 75 73 65 |fy MacAp|p to use|
|000005c0| 20 74 68 65 73 65 20 76 | 61 6c 75 65 73 2e 0d 2f | these v|alues../|
|000005d0| 2f 09 49 6e 20 63 61 73 | 65 20 74 68 65 79 20 77 |/.In cas|e they w|
|000005e0| 69 6c 6c 20 68 61 76 65 | 20 74 6f 20 62 65 20 63 |ill have| to be c|
|000005f0| 68 61 6e 67 65 64 2e 0d | 2f 2f 0d 72 65 73 6f 75 |hanged..|//.resou|
|00000600| 72 63 65 20 27 61 65 64 | 74 27 20 28 39 39 30 29 |rce 'aed|t' (990)|
|00000610| 0d 7b 0d 09 7b 0d 09 09 | 27 61 4c 69 62 27 2c 20 |.{..{...|'aLib', |
|00000620| 27 50 69 6e 67 27 2c 20 | 39 39 30 3b 0d 09 09 27 |'Ping', |990;...'|
|00000630| 61 4c 69 62 27 2c 20 27 | 41 64 64 20 27 2c 20 39 |aLib', '|Add ', 9|
|00000640| 39 31 3b 0d 09 09 27 61 | 4c 69 62 27 2c 20 27 43 |91;...'a|Lib', 'C|
|00000650| 68 6e 67 27 2c 20 39 39 | 32 3b 0d 09 09 27 61 4c |hng', 99|2;...'aL|
|00000660| 69 62 27 2c 20 27 52 6d | 76 65 27 2c 20 39 39 33 |ib', 'Rm|ve', 993|
|00000670| 3b 0d 09 09 27 61 4c 69 | 62 27 2c 20 27 53 65 74 |;...'aLi|b', 'Set|
|00000680| 20 27 2c 20 39 39 34 3b | 0d 09 09 27 61 4c 69 62 | ', 994;|...'aLib|
|00000690| 27 2c 20 27 55 70 64 74 | 27 2c 20 39 39 35 3b 0d |', 'Updt|', 995;.|
|000006a0| 09 7d 0d 7d 3b 0d 0d 00 | 00 00 00 00 00 00 00 00 |.}.};...|........|
|000006b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000006c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000006d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000006e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000006f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000700| 00 00 01 00 00 00 01 7c | 00 00 00 7c 00 00 00 5e |.......||...|...^|
|00000710| 24 60 01 3f 2b 69 02 3f | 13 a9 59 12 2f 0b 4e ad |$`.?+i.?|..Y./.N.|
|00000720| 11 08 82 11 3c 00 3e 11 | 08 8a ef 60 01 3f 06 11 |....<.>.|...`.?..|
|00000730| 0b 41 64 4c 69 62 4c 69 | 6e 6b 2e 72 70 2e 68 70 |.AdLibLi|nk.rp.hp|
|00000740| 70 73 72 2e 68 68 68 68 | 68 65 62 75 67 29 65 29 |psr.hhhh|hebug)e)|
|00000750| 02 00 54 45 58 54 43 57 | 49 45 01 00 00 00 00 01 |..TEXTCW|IE......|
|00000760| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000770| 00 00 a7 72 9d 33 00 00 | 06 27 00 00 01 da 50 11 |...r.3..|.'....P.|
|00000780| 27 52 38 45 55 38 4b 55 | 38 45 60 23 34 13 14 1a |'R8EU8KU|8E`#4...|
|00000790| 58 8f 2f 00 7f 7e 4d 7e | ac 64 ac 58 58 13 22 68 |X./..~M~|.d.XX."h|
|000007a0| 00 40 4e 91 60 4c 01 ff | c8 7f 13 21 7c 00 01 00 |.@N.`L..|...!|...|
|000007b0| 00 db 7f 20 02 e2 49 01 | ff ea 5c 13 0f 18 28 6e |... ..I.|..\...(n|
|000007c0| 00 08 60 4c 01 01 46 34 | 20 00 55 56 7f 7e 01 00 |..`L..F4| .UV.~..|
|000007d0| 3c 64 12 00 3c 20 50 58 | 20 01 60 4c 01 ff 7a 34 |<d..< PX| .`L..z4|
|000007e0| 01 14 ba c5 68 6a d6 34 | 01 15 02 67 6b 01 00 fa |....hj.4|...gk...|
|000007f0| 7f 13 0c 68 80 00 00 40 | 80 03 00 ee 26 54 3d 6b |...h...@|....&T=k|
|00000800| 00 00 00 1e 00 2e 00 09 | 02 4e 02 8d 00 2e 00 09 |........|.N......|
|00000810| 02 4e 02 8d 00 00 00 00 | 00 00 00 00 00 00 00 00 |.N......|........|
|00000820| 00 00 00 00 00 48 00 09 | 4d 6f 6e 61 63 6f 00 00 |.....H..|Monaco..|
|00000830| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000840| 00 00 00 00 00 00 00 00 | 00 02 00 02 00 3e 00 09 |........|.....>..|
|00000850| 02 5d 02 8d 00 3e 00 09 | 02 5d 02 8d b2 c7 b3 d6 |.]...>..|.]......|
|00000860| 00 00 00 ee 00 00 00 ee | 00 00 00 00 01 00 00 00 |........|........|
|00000870| 00 02 00 00 00 00 00 04 | 00 01 00 01 00 00 01 00 |........|........|
|00000880| 00 00 01 7c 00 00 00 7c | 00 00 00 5e 08 37 71 b0 |...|...||...^.7q.|
|00000890| 1e da 00 00 00 1c 00 5e | 00 01 4d 50 53 52 00 02 |.......^|..MPSR..|
|000008a0| 00 12 4d 57 42 42 00 00 | 00 36 03 f0 ff ff 00 00 |..MWBB..|.6......|
|000008b0| 00 00 00 00 00 00 03 ed | ff ff 00 00 00 22 00 00 |........|....."..|
|000008c0| 00 00 03 ef ff ff 00 00 | 00 6e 00 00 00 00 03 f0 |........|.n......|
|000008d0| ff ff 00 00 00 74 00 00 | 00 00 00 00 00 00 00 00 |.....t..|........|
|000008e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000008f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+